home *** CD-ROM | disk | FTP | other *** search
/ Compute! Gazette 1990 March / 1990-03.d64 / ml programming (.txt) < prev    next >
Commodore BASIC  |  2022-09-20  |  307b  |  9 lines
  1. 5 print"[147][154]":poke53280,14:poke53281,6
  2. 10 data 165,97,240,32,201,132,240,22,144,26,169,132,133
  3. 20 data 97,169,160,133,98,169,0,133,99,133,100,133,101
  4. 30 data 133,102,240,6,165,98,201,160,176,230,96
  5. 40 for j=828 to 864:read x:t=t+x:poke j,x:next j
  6. 50 if t<>4865 then stop
  7. 60 poke785,60:poke786,3:rem point usr to ml
  8. 70 for k=5 to 15:print k;usr(k):next k
  9.